<?php

namespace application\extensions;

use application\extensions\SimpleUnzip;

class Zip {

    var $datasec = array();
    var $ctrl_dir = array();
    var $eof_ctrl_dir = "\x50\x4b\x05\x06\x00\x00\x00\x00";
    var $old_offset = 0;

    function unix2DosTime( $unixtime = 0 ) {
        $timearray = ($unixtime == 0) ? getdate() : getdate( $unixtime );

        if ( $timearray['year'] < 1980 ) {
            $timearray['year'] = 1980;
            $timearray['mon'] = 1;
            $timearray['mday'] = 1;
            $timearray['hours'] = 0;
            $timearray['minutes'] = 0;
            $timearray['seconds'] = 0;
        } // end if

        return (($timearray['year'] - 1980) << 25) | ($timearray['mon'] << 21) | ($timearray['mday'] << 16) |
                ($timearray['hours'] << 11) | ($timearray['minutes'] << 5) | ($timearray['seconds'] >> 1);
    }

// end of the 'unix2DosTime()' method

    function addFile( $data, $name, $time = 0 ) {
        $name = str_replace( '\\', '/', $name );

        $dtime = dechex( $this->unix2DosTime( $time ) );
        $hexdtime = '\x' . $dtime[6] . $dtime[7]
                . '\x' . $dtime[4] . $dtime[5]
                . '\x' . $dtime[2] . $dtime[3]
                . '\x' . $dtime[0] . $dtime[1];
        eval( '$hexdtime = "' . $hexdtime . '";' );

        $fr = "\x50\x4b\x03\x04";
        $fr .= "\x14\x00";   // ver needed to extract
        $fr .= "\x00\x00";   // gen purpose bit flag
        $fr .= "\x08\x00";   // compression method
        $fr .= $hexdtime;    // last mod time and date

        $unc_len = strlen( $data );
        $crc = crc32( $data );
        $zdata = gzcompress( $data );
        $zdata = substr( substr( $zdata, 0, strlen( $zdata ) - 4 ), 2 ); // fix crc bug
        $c_len = strlen( $zdata );
        $fr .= pack( 'V', $crc );    // crc32
        $fr .= pack( 'V', $c_len );     // compressed filesize
        $fr .= pack( 'V', $unc_len );   // uncompressed filesize
        $fr .= pack( 'v', strlen( $name ) ); // length of filename
        $fr .= pack( 'v', 0 );    // extra field length
        $fr .= $name;

        $fr .= $zdata;


        $this->datasec[] = $fr;

        $cdrec = "\x50\x4b\x01\x02";
        $cdrec .= "\x00\x00";    // version made by
        $cdrec .= "\x14\x00";    // version needed to extract
        $cdrec .= "\x00\x00";    // gen purpose bit flag
        $cdrec .= "\x08\x00";    // compression method
        $cdrec .= $hexdtime;     // last mod time & date
        $cdrec .= pack( 'V', $crc );     // crc32
        $cdrec .= pack( 'V', $c_len );   // compressed filesize
        $cdrec .= pack( 'V', $unc_len );    // uncompressed filesize
        $cdrec .= pack( 'v', strlen( $name ) ); // length of filename
        $cdrec .= pack( 'v', 0 );    // extra field length
        $cdrec .= pack( 'v', 0 );    // file comment length
        $cdrec .= pack( 'v', 0 );    // disk number start
        $cdrec .= pack( 'v', 0 );    // internal file attributes
        $cdrec .= pack( 'V', 32 );   // external file attributes - 'archive' bit set

        $cdrec .= pack( 'V', $this->old_offset ); // relative offset of local header
        $this->old_offset += strlen( $fr );

        $cdrec .= $name;

        $this->ctrl_dir[] = $cdrec;
    }

// end of the 'addFile()' method

    function file() {
        $data = implode( '', $this->datasec );
        $ctrldir = implode( '', $this->ctrl_dir );

        return
                $data .
                $ctrldir .
                $this->eof_ctrl_dir .
                pack( 'v', sizeof( $this->ctrl_dir ) ) . // total # of entries "on this disk"
                pack( 'v', sizeof( $this->ctrl_dir ) ) . // total # of entries overall
                pack( 'V', strlen( $ctrldir ) ) . // size of central dir
                pack( 'V', strlen( $data ) ) . // offset to start of central dir
                "\x00\x00";        // .zip file comment length
    }

// end of the 'file()' method
}

// end of the 'zipfile' class

class SimpleUnzip {

    var $Comment = '';
    var $Entries = array();
    var $Name = '';
    var $Size = 0;
    var $Time = 0;

    function SimpleUnzip( $in_FileName = '' ) {
        if ( $in_FileName !== '' ) {
            SimpleUnzip::ReadFile( $in_FileName );
        }
    }

// end of the 'SimpleUnzip' constructor

    function Count() {
        return count( $this->Entries );
    }

// end of the 'Count()' method

    function GetData( $in_Index ) {
        return $this->Entries[$in_Index]->Data;
    }

// end of the 'GetData()' method

    function GetEntry( $in_Index ) {
        return $this->Entries[$in_Index];
    }

// end of the 'GetEntry()' method

    function GetError( $in_Index ) {
        return $this->Entries[$in_Index]->Error;
    }

// end of the 'GetError()' method

    function GetErrorMsg( $in_Index ) {
        return $this->Entries[$in_Index]->ErrorMsg;
    }

// end of the 'GetErrorMsg()' method

    function GetName( $in_Index ) {
        return $this->Entries[$in_Index]->Name;
    }

// end of the 'GetName()' method

    function GetPath( $in_Index ) {
        return $this->Entries[$in_Index]->Path;
    }

// end of the 'GetPath()' method

    function GetTime( $in_Index ) {
        return $this->Entries[$in_Index]->Time;
    }

// end of the 'GetTime()' method

    function ReadFile( $in_FileName ) {
        $this->Entries = array();

        $this->Name = $in_FileName;
        $this->Time = filemtime( $in_FileName );
        $this->Size = filesize( $in_FileName );

        $oF = fopen( $in_FileName, 'rb' );
        $vZ = fread( $oF, $this->Size );
        fclose( $oF );

        $aE = explode( "\x50\x4b\x05\x06", $vZ );


        $aP = unpack( 'x16/v1CL', $aE[1] );
        $this->Comment = substr( $aE[1], 18, $aP['CL'] );

        $this->Comment = strtr( $this->Comment, array( "\r\n" => "\n",
            "\r" => "\n" ) );

        $aE = explode( "\x50\x4b\x01\x02", $vZ );
        $aE = explode( "\x50\x4b\x03\x04", $aE[0] );
        array_shift( $aE );

        foreach ( $aE as $vZ ) {
            $aI = array();
            $aI['E'] = 0;
            $aI['EM'] = '';
            $aP = unpack( 'v1VN/v1GPF/v1CM/v1FT/v1FD/V1CRC/V1CS/V1UCS/v1FNL', $vZ );
            $bE = ($aP['GPF'] && 0x0001) ? TRUE : FALSE;
            $nF = $aP['FNL'];

            if ( $aP['GPF'] & 0x0008 ) {
                $aP1 = unpack( 'V1CRC/V1CS/V1UCS', substr( $vZ, -12 ) );

                $aP['CRC'] = $aP1['CRC'];
                $aP['CS'] = $aP1['CS'];
                $aP['UCS'] = $aP1['UCS'];

                $vZ = substr( $vZ, 0, -12 );
            }

            $aI['N'] = substr( $vZ, 26, $nF );

            if ( substr( $aI['N'], -1 ) == '/' ) {
                continue;
            }

            $aI['P'] = dirname( $aI['N'] );
            $aI['P'] = $aI['P'] == '.' ? '' : $aI['P'];
            $aI['N'] = basename( $aI['N'] );

            $vZ = substr( $vZ, 26 + $nF );

            if ( strlen( $vZ ) != $aP['CS'] ) {
                $aI['E'] = 1;
                $aI['EM'] = 'Compressed size is not equal with the value in header information.';
            } else {
                if ( $bE ) {
                    $aI['E'] = 5;
                    $aI['EM'] = 'File is encrypted, which is not supported from this class.';
                } else {
                    switch ( $aP['CM'] ) {
                        case 0: // Stored
                            break;

                        case 8: // Deflated
                            $vZ = gzinflate( $vZ );
                            break;

                        case 12: // BZIP2
                            if ( !extension_loaded( 'bz2' ) ) {
                                if ( strtoupper( substr( PHP_OS, 0, 3 ) ) == 'WIN' ) {
                                    @dl( 'php_bz2.dll' );
                                } else {
                                    @dl( 'bz2.so' );
                                }
                            }

                            if ( extension_loaded( 'bz2' ) ) {
                                $vZ = bzdecompress( $vZ );
                            } else {
                                $aI['E'] = 7;
                                $aI['EM'] = "PHP BZIP2 extension not available.";
                            }

                            break;

                        default:
                            $aI['E'] = 6;
                            $aI['EM'] = "De-/Compression method {$aP['CM']} is not supported.";
                    }

                    if ( !$aI['E'] ) {
                        if ( $vZ === FALSE ) {
                            $aI['E'] = 2;
                            $aI['EM'] = 'Decompression of data failed.';
                        } else {
                            if ( strlen( $vZ ) != $aP['UCS'] ) {
                                $aI['E'] = 3;
                                $aI['EM'] = 'Uncompressed size is not equal with the value in header information.';
                            } else {
                                if ( crc32( $vZ ) != $aP['CRC'] ) {
                                    $aI['E'] = 4;
                                    $aI['EM'] = 'CRC32 checksum is not equal with the value in header information.';
                                }
                            }
                        }
                    }
                }
            }

            $aI['D'] = $vZ;

            $aI['T'] = mktime( ($aP['FT'] & 0xf800) >> 11, ($aP['FT'] & 0x07e0) >> 5, ($aP['FT'] & 0x001f) << 1, ($aP['FD'] & 0x01e0) >> 5, ($aP['FD'] & 0x001f ), (($aP['FD'] & 0xfe00) >> 9) + 1980 );

            $this->Entries[] = new \simpleUnzipEntry( $aI );
        } // end for each entries

        return $this->Entries;
    }

// end of the 'ReadFile()' method
}

// end of the 'SimpleUnzip' class

class simpleUnzipEntry {

    var $Data = '';
    var $Error = 0;
    var $ErrorMsg = '';
    var $Name = '';
    var $Path = '';
    var $Time = 0;

    function simpleUnzipEntry( $in_Entry ) {
        $this->Data = $in_Entry['D'];
        $this->Error = $in_Entry['E'];
        $this->ErrorMsg = $in_Entry['EM'];
        $this->Name = $in_Entry['N'];
        $this->Path = $in_Entry['P'];
        $this->Time = $in_Entry['T'];
    }

// end of the 'simpleUnzipEntry' constructor
}

// end of the 'simpleUnzipEntry' class